home *** CD-ROM | disk | FTP | other *** search
/ Growing Good Roses / Growing Good Roses.iso / pc / misc / demo.dxr / 00074.ls < prev    next >
Encoding:
Text File  |  1997-04-18  |  355 b   |  12 lines
  1. on mouseDown
  2.   set the castNum of sprite the clickOn to the castNum of sprite the clickOn + 1
  3.   updateStage()
  4.   startTimer()
  5.   repeat while the timer < 20
  6.     nothing()
  7.   end repeat
  8.   set the castNum of sprite the clickOn to the castNum of sprite the clickOn - 1
  9.   updateStage()
  10.   play frame string(the name of cast the castNum of sprite the clickOn)
  11. end
  12.